COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	Load BB programs, do initialization, and print "help" message
C00003 ENDMK
C⊗;
;;;Load BB programs, do initialization, and print "help" message
(PROG NIL
;;;(ioc w)
(setq ↑w t)
    (REQUIRE BBCLT MCL DSK (/206 LSP))
    (REQUIRE BBHELP MCL DSK (/206 LSP))
;;;(ioc v)
(setq ↑w nil)
    (SETQ SETVALUESLIST 
      (QUOTE (BBFCNS
         BBLIST
	 BBPROPS
	 FIN
	 HIN
	 MAXF
	 PPLISTLPT
	 PPLISTPUB
	 SIN)))
    (SETVALUES SETVALUESLIST)
    (BBINIT BBPP)
    (LCASE VAR)
    (PRINC '|BB files loaded|)
    (TERPRI)
    (PRINC '|Type "(BBHELP)" to find out what the BB program can do|)
    (TERPRI)
    (RETURN 'BBready)
)